home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZGETDAT.C < prev    next >
Text File  |  1988-12-18  |  688b  |  19 lines
  1. /*
  2. ┌────────────────────────────────────────────────────────────────────────────┐
  3. │jzgetdat.c                                                                  │
  4. │Return the dos date                                                         │
  5. │                                                                            │
  6. │ (C) JazSoft Software by Jack A. Zucker (301) 794-5950                      │
  7. └────────────────────────────────────────────────────────────────────────────┘
  8. */
  9.  
  10. jzgetdat( fdate )
  11. char *fdate;
  12. {
  13.   union REGS winreg,woutreg;
  14.  
  15.   winreg.h.ah = 0x2a;
  16.   intdos(&winreg,&woutreg);
  17.   sprintf(fdate,"%02d-%02d-%4d",woutreg.h.dh,woutreg.h.dl,woutreg.x.cx);
  18. }
  19.